home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 August / PCWorld_2001-08_cd.bin / Software / Vyzkuste / codePad / CodePad30.exe / Syntax Definitions / perl.def < prev    next >
Text File  |  2000-11-08  |  4KB  |  156 lines

  1. object TPersHolder
  2.   P.Name = 'Perl'
  3.   P.SyntaxBlocks = <
  4.     item
  5.       Name = 'Default'
  6.       ID = 0
  7.       CaseSensitive = True
  8.       UseMetaSymbol = True
  9.       UseMetaToWrapLines = True
  10.       MetaSymbol = '\'
  11.       FIText = 0
  12.       FIIntNum = 1
  13.       FIFloatNum = 2
  14.       FIHexNum = 3
  15.       FISymbol = 9
  16.       UseSymbols = True
  17.       UseComments = True
  18.       UseSingleLineComments = True
  19.       UseStrings = True
  20.       UseSingleLineStrings = True
  21.       UseNumbers = True
  22.       UsePrefixedIdentifiers = True
  23.       UseKeywords = True
  24.       BlockDelimiters = <>
  25.       SingleLineCommentDelimiters = <
  26.         item
  27.           FontID = 4
  28.           LeftDelimiter = '#'
  29.         end>
  30.       SingleLineStringDelimiters = <
  31.         item
  32.           FontID = 5
  33.           LeftDelimiter = '"'
  34.           RightDelimiter = '"'
  35.         end
  36.         item
  37.           FontID = 6
  38.           LeftDelimiter = #39
  39.           RightDelimiter = #39
  40.         end
  41.         item
  42.           FontID = 7
  43.           LeftDelimiter = '`'
  44.           RightDelimiter = '`'
  45.         end>
  46.       IdentPrefixes = <
  47.         item
  48.           LeftDelimiter = '$#'
  49.         end
  50.         item
  51.           LeftDelimiter = '$'
  52.         end>
  53.       KeywordSets = <
  54.         item
  55.           FontID = 8
  56.           Name = 'reserved'
  57.           Keywords = 
  58.             'and,cmp,continue,do,else,elsif,eq,for,foreach,ge,goto,gt,if,last' +
  59.             ',le,lt,my,ne,next,not,or,package,return,sub,switch,unless,until,' +
  60.             'use,while,xor'
  61.         end>
  62.     end>
  63.   P.FontTable = <
  64.     item
  65.       FontID = 0
  66.       GlobalAttrID = 'Whitespace'
  67.       Font.Charset = DEFAULT_CHARSET
  68.       Font.Color = clBlack
  69.       Font.Height = -13
  70.       Font.Name = 'Courier New'
  71.       Font.Style = []
  72.     end
  73.     item
  74.       FontID = 1
  75.       GlobalAttrID = 'Integer'
  76.       Font.Charset = DEFAULT_CHARSET
  77.       Font.Color = clGreen
  78.       Font.Height = -13
  79.       Font.Name = 'Courier New'
  80.       Font.Style = []
  81.     end
  82.     item
  83.       FontID = 2
  84.       GlobalAttrID = 'Float'
  85.       Font.Charset = DEFAULT_CHARSET
  86.       Font.Color = clGreen
  87.       Font.Height = -13
  88.       Font.Name = 'Courier New'
  89.       Font.Style = []
  90.     end
  91.     item
  92.       FontID = 3
  93.       GlobalAttrID = 'Integer'
  94.       Font.Charset = DEFAULT_CHARSET
  95.       Font.Color = clGreen
  96.       Font.Height = -13
  97.       Font.Name = 'Courier New'
  98.       Font.Style = []
  99.     end
  100.     item
  101.       FontID = 4
  102.       GlobalAttrID = 'Comment'
  103.       Font.Charset = DEFAULT_CHARSET
  104.       Font.Color = clGray
  105.       Font.Height = -13
  106.       Font.Name = 'Courier New'
  107.       Font.Style = [fsItalic]
  108.     end
  109.     item
  110.       FontID = 5
  111.       GlobalAttrID = 'String'
  112.       Font.Charset = DEFAULT_CHARSET
  113.       Font.Color = clMaroon
  114.       Font.Height = -13
  115.       Font.Name = 'Courier New'
  116.       Font.Style = []
  117.     end
  118.     item
  119.       FontID = 6
  120.       GlobalAttrID = 'String'
  121.       Font.Charset = DEFAULT_CHARSET
  122.       Font.Color = clMaroon
  123.       Font.Height = -13
  124.       Font.Name = 'Courier New'
  125.       Font.Style = []
  126.     end
  127.     item
  128.       FontID = 7
  129.       GlobalAttrID = 'String'
  130.       Font.Charset = DEFAULT_CHARSET
  131.       Font.Color = clMaroon
  132.       Font.Height = -13
  133.       Font.Name = 'Courier New'
  134.       Font.Style = []
  135.     end
  136.     item
  137.       FontID = 8
  138.       GlobalAttrID = 'Reserved words'
  139.       Font.Charset = DEFAULT_CHARSET
  140.       Font.Color = clBlue
  141.       Font.Height = -13
  142.       Font.Name = 'Courier New'
  143.       Font.Style = [fsBold]
  144.     end
  145.     item
  146.       FontID = 9
  147.       GlobalAttrID = 'Delimiters'
  148.       Font.Charset = DEFAULT_CHARSET
  149.       Font.Color = clBlack
  150.       Font.Height = -13
  151.       Font.Name = 'Courier New'
  152.       Font.Style = []
  153.     end>
  154.   P.SyntaxVersion = 3
  155. end
  156.